program lists;

{$APPTYPE CONSOLE}

uses
  SysUtils;

type
  pelement=^element;
  element= record
    value: integer;
    next: pelement;
  end;
var
  head: pelement;
  current: pelement;
  fin: textFile;
  n,i,num: integer;

procedure AddToEnd (_head:pelement; num:integer);
  var
    tmp: pelement;
  begin
    tmp:=_head;
    while (tmp^.next<>nil) do
      tmp:=tmp^.next;
    new(tmp^.next);
    tmp^.next^.next:=nil;
    tmp^.next^.value:=num;
  end;

begin
  System.New(head);
  head^.next:=nil;
  assignFile(fin,'input.txt');
  reset(fin);
  readln(fin,n);
  readln(fin,num);
  head^.value:=num;
  current:=head;
  for i:=2 to n do
  begin
    readln(fin,num);
    AddToEnd(current^.next,num);
    current:=current^.next;
  end;
  closeFile(fin);
  current:=head;
  for i:=1 to n do
  begin
    writeln(current^.value+i);
    current:=current^.next;
  end;
  readln;


  { TODO -oUser -cConsole Main : Insert code here }
end.
